home *** CD-ROM | disk | FTP | other *** search
/ Aminet 44 / Aminet 44 (2001)(GTI - Schatztruhe)[!][Aug 2001].iso / Aminet / comm / mail / YAM23.lha / YAM2.3 / Rexx / WEBmail.rexx < prev   
OS/2 REXX Batch file  |  2000-04-19  |  1KB  |  24 lines
  1. /* WEBmail.rexx - Send mail from your web browser using YAM               */
  2. /* $VER: WEBmail.rexx 2.3 (18.01.99) © 1999 by Marcel Beck <mbeck@yam.ch> */
  3. /*                                                                        */
  4. /* Usage from VOYAGER:                                                    */
  5. /*  Mailto app = sys:rexxc/rx yam:rexx/webmail %t %s                      */
  6. /*                                                                        */
  7. /* Usage from IBROWSE:                                                    */
  8. /*  External mailto command = sys:rexxc/rx yam:rexx/webmail %h %s         */
  9. /*                                                                        */
  10. /* Usage from AWEB:                                                       */
  11. /*  Mailto command = sys:rexxc/rx                                         */
  12. /*  Mailto arguments = yam:rexx/webmail %e                                */
  13.  
  14. PARSE ARG email' 'subject
  15. IF ~SHOW('Ports','YAM') THEN
  16.   ADDRESS COMMAND 'Run <>NIL: YAM:YAM NOCHECK MAILTO 'email
  17. ELSE DO
  18.   ADDRESS YAM
  19.   Show
  20.   MailWrite
  21.   WriteTo email
  22.   'WriteSubject "'subject'"'
  23. END
  24.